-- card: 30328 from stack: in.0-2
-- bmap block id: 30540
-- flags: 0000
-- background id: 27044
-- name: academic
----- HyperTalk script -----
-- This handler performs the animation.
on doAnimation
  wait 20
  repeat for 2
    repeat with n = 1 to 4
      set the icon of btn "thingshappen" to ("disturbance" & n)
      wait 10
    end repeat
    set the icon of btn "thingshappen" to 0
    wait 20
  end repeat
  runLetters "Q A B C D E F G H I J K L R M N O P Q", "showFld"
  show cd btn "See It Again"
end doAnimation

-- Animates letters moving into a field from the right.
-- Modified from a script by Karl Anderson
on runLetters theWord, cdFldName
  put empty into cd fld cdFldName
  put "          " into spacesBefore
  put spacesBefore before theWord
  put theWord into cd fld cdFldName
  repeat with n = 1 to the number of chars of theWord
    delete char 1 of theWord
    put theWord into cd fld cdFldName
    wait 10
  end repeat
end runLetters

on reset
  hide cd btn "See It Again"
end reset




-- part 5 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=328 top=93 right=136 bottom=367
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: thingsHappen


-- part 6 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=54 top=71 right=167 bottom=369
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 214
-- text size: 80
-- style flags: 0
-- line height: 80
-- part name: showFld


-- part 7 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=65 top=78 right=171 bottom=229
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 174
-- text size: 14
-- style flags: 256
-- line height: 15
-- part name: 


-- part 9 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=57 top=172 right=189 bottom=137
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 174
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: See It Again
----- HyperTalk script -----
-- This handler resets the animation and shows it again.
on mouseUp
  set cursor to none
  reset
  unlock screen
  doAnimation
end mouseUp



-- part contents for card part 7
----- text -----
HyperCard provides you with easy curriculum development, and gives your students a compelling environment in which to learn.